﻿Module Module1
  Sub Main()

    Dim nl As String = Environment.NewLine
    Dim stringa As String = "    stringa     "
    Console.WriteLine("TrimEnd = " & _
        "<" & stringa.TrimEnd() & ">" & nl & _
        "TrimStart = " & _
        "<" & stringa.TrimStart() & ">" & nl & _
        "Trim = " & "<" & stringa.Trim() & ">")
    Console.ReadLine()

  End Sub
End Module
